﻿Public Class frmSalesReturnList
    Dim dbBase As New dbSales
    Dim frmCtrl As New FormControl
    Dim Var As New varDeclare
    Dim dsBase As DataSet
    Dim EntryID As String

    Private Sub frmSalesReturnList_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.WindowState = FormWindowState.Maximized
        EntryID = ""
        GridAndFind1.Enabled = True
        dsBase = dbBase.GetQuotationList()
        ToolbarHeader1.Iniliaze("LIST : Return Sales", Me, Nothing, GridAndFind1.getDataGridView(), "Number")
        GridAndFind1.Initialize(dsBase, "Number", ToolbarHeader1, Me, True)
        ToolbarHeader1.ActionCtrl(True, True, False, False, False, False, False, True, True)
    End Sub
End Class